/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / SQL and Data Base / Logic Works ERwin 3.5 / data.1 / ERTMPL32.DLL / RCDATA / 624

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 43 55 53 54 4f 4d 20 54 | 52 49 47 47 45 52 20 44 |CUSTOM T|RIGGER D|
|00000010| 45 46 41 55 4c 54 20 42 | 4f 44 59 00 63 72 65 61 |EFAULT B|ODY.crea|
|00000020| 74 65 20 70 72 6f 63 65 | 64 75 72 65 20 70 25 32 |te proce|dure p%2|
|00000030| 39 54 72 69 67 67 65 72 | 4e 61 6d 65 20 28 0d 0a |9Trigger|Name (..|
|00000040| 20 20 25 50 61 72 61 6d | 44 65 63 6c 28 6f 6c 64 |  %Param|Decl(old|
|00000050| 2c 6e 65 77 2c 22 2c 22 | 29 0d 0a 29 20 61 73 0d |,new,","|)..) as.|
|00000060| 0a 64 65 63 6c 61 72 65 | 0d 0a 20 20 63 6e 74 31 |.declare|..  cnt1|
|00000070| 20 69 6e 74 65 67 65 72 | 34 20 6e 6f 74 20 6e 75 | integer|4 not nu|
|00000080| 6c 6c 3b 0d 0a 2f 2a 20 | 25 54 72 69 67 67 65 72 |ll;../* |%Trigger|
|00000090| 4e 61 6d 65 20 25 41 63 | 74 69 6f 6e 73 28 22 2c |Name %Ac|tions(",|
|000000a0| 22 29 20 70 72 6f 63 65 | 64 75 72 65 20 6f 6e 20 |") proce|dure on |
|000000b0| 25 54 61 62 6c 65 4e 61 | 6d 65 20 2a 2f 0d 0a 62 |%TableNa|me */..b|
|000000c0| 65 67 69 6e 0d 0a 25 46 | 6f 72 45 61 63 68 43 68 |egin..%F|orEachCh|
|000000d0| 69 6c 64 52 65 6c 28 29 | 20 7b 0d 0a 20 20 25 52 |ildRel()| {..  %R|
|000000e0| 65 6c 54 65 6d 70 6c 61 | 74 65 0d 0a 7d 0d 0a 25 |elTempla|te..}..%|
|000000f0| 46 6f 72 45 61 63 68 50 | 61 72 65 6e 74 52 65 6c |ForEachP|arentRel|
|00000100| 28 29 20 7b 0d 0a 20 20 | 25 52 65 6c 54 65 6d 70 |() {..  |%RelTemp|
|00000110| 6c 61 74 65 0d 0a 7d 0d | 0a 65 6e 64 3b 0d 0a 63 |late..}.|.end;..c|
|00000120| 72 65 61 74 65 20 72 75 | 6c 65 20 25 54 72 69 67 |reate ru|le %Trig|
|00000130| 67 65 72 4e 61 6d 65 20 | 61 66 74 65 72 20 25 41 |gerName |after %A|
|00000140| 63 74 69 6f 6e 73 28 22 | 2c 22 29 20 6f 6e 20 25 |ctions("|,") on %|
|00000150| 54 61 62 6c 65 4e 61 6d | 65 0d 0a 20 20 25 52 65 |TableNam|e..  %Re|
|00000160| 66 43 6c 61 75 73 65 0d | 0a 2f 2a 20 45 52 77 69 |fClause.|./* ERwi|
|00000170| 6e 20 42 75 69 6c 74 69 | 6e 20 25 44 61 74 65 74 |n Builti|n %Datet|
|00000180| 69 6d 65 20 2a 2f 0d 0a | 2f 2a 20 25 54 72 69 67 |ime */..|/* %Trig|
|00000190| 67 65 72 4e 61 6d 65 20 | 25 41 63 74 69 6f 6e 73 |gerName |%Actions|
|000001a0| 28 22 2c 22 29 20 72 75 | 6c 65 20 6f 6e 20 25 54 |(",") ru|le on %T|
|000001b0| 61 62 6c 65 4e 61 6d 65 | 20 2a 2f 0d 0a 2f 2a 20 |ableName| */../* |
|000001c0| 64 65 66 61 75 6c 74 20 | 62 6f 64 79 20 66 6f 72 |default |body for|
|000001d0| 20 25 54 72 69 67 67 65 | 72 4e 61 6d 65 20 2a 2f | %Trigge|rName */|
|000001e0| 0d 0a 20 20 65 78 65 63 | 75 74 65 20 70 72 6f 63 |..  exec|ute proc|
|000001f0| 65 64 75 72 65 20 70 25 | 31 41 63 74 69 6f 6e 5f |edure p%|1Action_|
|00000200| 25 32 37 54 61 62 6c 65 | 4e 61 6d 65 20 28 0d 0a |%27Table|Name (..|
|00000210| 20 20 20 20 25 50 61 72 | 61 6d 50 61 73 73 28 6f |    %Par|amPass(o|
|00000220| 6c 64 2c 6e 65 77 2c 22 | 3d 22 2c 22 2c 22 29 0d |ld,new,"|=",",").|
|00000230| 0a 20 20 29 3b 0d 0a 0d | 0a 2f 2a 20 65 6e 64 20 |.  );...|./* end |
|00000240| 6f 66 20 25 54 72 69 67 | 67 65 72 4e 61 6d 65 20 |of %Trig|gerName |
|00000250| 2a 2f 00 30 27          |                         |*/.0'   |        |
+--------+-------------------------+-------------------------+--------+--------+